-- card: 4098 from stack: in
-- bmap block id: 5170
-- flags: 0000
-- background id: 2577
-- name: Major


-- part 1 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=199 top=53 right=79 bottom=307
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: field1
----- HyperTalk script -----
function firstline
put line 1 of "field1" of card "Major" into card field "header" of card "Level"
end firstline


-- part 2 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=309 top=98 right=124 bottom=414
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: field2


-- part 3 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=77 top=157 right=183 bottom=180
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: field3


-- part 4 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=202 top=158 right=184 bottom=306
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: field4


-- part 6 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=17 top=209 right=234 bottom=123
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: field6


-- part 7 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=139 top=209 right=235 bottom=243
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: field7


-- part 8 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=268 top=209 right=236 bottom=373
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: field8


-- part 9 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=388 top=209 right=235 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: field9


-- part 11 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=245 top=79 right=100 bottom=265
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mousedown
  set hilite of button id 11 to true
  wait 20
end mousedown



on mouseUp
  visual effect dissolve
  set hilite of button id 11 to false
  put line 1 of card field "field1" && line 2 of card field "field1" into card field "header" of card "Level1"
  go to card "Level1"
end mouseUp



-- part 12 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=118 top=138 right=152 bottom=137
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mousedown
  set hilite of button id 12 to true
  wait 20
end mousedown

on mouseUp
  set hilite of button id 12 to false
  visual effect dissolve
  put line 1 of card field "field3" && line 2 of card field"field3" into card field "header" of card "Level2a"
  go to card "Level2a"
end mouseUp



-- part 13 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=245 top=138 right=153 bottom=263
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mousedown
  set hilite of button id 13 to true
  wait 20
end mousedown


on mouseUp
  set hilite of button id 13 to false
  visual effect dissolve
  put line 1 of card field "field4" && line 2 of card field "field4" into card field "header" of card "Level2b"
  go to card "Level2b"
end mouseUp



-- part 14 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=375 top=137 right=152 bottom=393
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mousedown
  set hilite of button id 14 to true
  wait 20
end mousedown
on mouseUp
  set hilite of button id 14 to false
  visual effect dissolve
  put line 1 of card field "field5" && line 2 of card field "field5" into card field "header" of card "Level2c"
  go to card "Level2c"
end mouseUp



-- part 15 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=59 top=188 right=203 bottom=77
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mousedown
  set hilite of button id 15 to true
  wait 20
end mousedown

on mouseUp
  set hilite of button id 15 to false
  visual effect dissolve
  put line 1 of card field "field6" && line 2 of card field "field6" into card field "header" of card "Level2d"
  go to card "Level2d"
end mouseUp



-- part 16 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=180 top=188 right=205 bottom=199
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mousedown
  set hilite of button id 16 to true
  wait 20
end mousedown

on mouseUp
  set hilite of button id 16 to false
  visual effect dissolve
  put line 1 of card field "field7" && line 2 of card field "field7" into card field "header" of card "Level2e"
  go to card "Level2e"
end mouseUp



-- part 17 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=312 top=190 right=205 bottom=330
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mousedown
  set hilite of button id 17 to true
  wait 20
end mousedown

on mouseUp
  set hilite of button id 17 to false
  visual effect dissolve
  put line 1 of card field "field8" && line 2 of card field "field8" into card field "header" of card "Level2f"
  go to card "Level2f"
end mouseUp



-- part 18 (button)
-- low flags: 00
-- high flags: 0006
-- rect: left=433 top=189 right=204 bottom=451
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mousedown
  set hilite of button id 18 to true
  wait 20
end mousedown

on mouseUp
  set hilite of button id 18 to false
  visual effect dissolve
  put line 1 of card field "field9" && line 2 of card field "field9" into card field "header" of card "Level2g"
  go to card "Level2g"
end mouseUp



-- part 21 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=112 top=7 right=25 bottom=400
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 4
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: field10


-- part 22 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=328 top=158 right=183 bottom=436
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: field5


-- part 23 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=158 top=310 right=332 bottom=241
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Information
----- HyperTalk script -----
on mouseUp
  visual effect barn door close
  go to card "Dialogue"
end mouseUp



-- part 24 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=278 top=310 right=332 bottom=363
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Find
----- HyperTalk script -----
on mouseUp
  doMenu "Find..."
end mouseUp



-- part 25 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=20 top=310 right=332 bottom=88
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Home
----- HyperTalk script -----
on mouseUp
  visual effect iris close
  go "Home"
end mouseUp



-- part 26 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=397 top=310 right=332 bottom=502
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Quit Hypercard
----- HyperTalk script -----
on mouseUp
  doMenu "Quit HyperCard"
end mouseUp



-- part contents for card part 1
----- text -----
Division
 Manager

-- part contents for card part 2
----- text -----
Secretary

-- part contents for card part 3
----- text -----
Manufacturing
Manager


-- part contents for card part 4
----- text -----
Business
Manager

-- part contents for card part 6
----- text -----
Eng. Development
Manager

-- part contents for card part 7
----- text -----
Program
Manager

-- part contents for card part 8
----- text -----
Accounting
Manager

-- part contents for card part 9
----- text -----
Quality Assurance
Manager

-- part contents for card part 21
----- text -----
WIRE WHEEL DIVISION

-- part contents for card part 22
----- text -----
Engineering
Manager